home *** CD-ROM | disk | FTP | other *** search
/ Especial Multimedia / Especial Multimedia.iso / Multimed / Herra / TIMWIN.ZIP / SWITCHD.CMD < prev    next >
OS/2 REXX Batch file  |  1993-09-22  |  466b  |  40 lines
  1. ;  switchd   --  displays the 8 bitplanes of 'bswitch' 
  2. ;******************************************************
  3. parms
  4.   int windis
  5. endparms
  6.  
  7. dest p
  8. show p
  9. copy bswitch >a
  10.  
  11. curs  128 128
  12. frmt  220 220
  13. era p
  14. dump pc 255
  15. and p a
  16. save q
  17. redu q
  18.  
  19. dest q
  20. bit p1 8
  21. copy q1 r1
  22. bit p1 7
  23. copy q1 r2
  24. bit p1 6
  25. copy q1 s1
  26. bit p1 5
  27. copy q1 s2
  28. bit p1 4
  29. copy q1 r3
  30. bit p1 3
  31. copy q1 r4
  32. bit p1 2
  33. copy q1 s3
  34. bit p1 1
  35. copy q1 s4
  36. era p
  37. era q
  38. stop
  39. 
  40.